Chip 1997 June/CHIP Turkiye Haziran 1997.iso/shar/95crowd/_setup.1/Crowd.exe/0/RCDATA/TFRMCREATESHORTCUT/TFRMCREATESHORTCUT.txt

Text File | 1996-09-03 | 4KB | 163 lines

object frmCreateShortcut: TfrmCreateShortcut
  Left = 198
  Top = 111
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Create Shortcut'
  ClientHeight = 212
  ClientWidth = 363
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object cmdFinish: TButton
    Left = 298
    Top = 185
    Width = 54
    Height = 21
    Caption = '&Finish'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = cmdFinishClick
  end
  object cmdNext: TButton
    Left = 239
    Top = 185
    Width = 54
    Height = 21
    Caption = '&Next>'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = cmdNextClick
  end
  object cmdBack: TButton
    Left = 185
    Top = 185
    Width = 54
    Height = 21
    Caption = '<&Back'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = cmdBackClick
  end
  object cmdCancel: TButton
    Left = 123
    Top = 185
    Width = 54
    Height = 21
    Cancel = True
    Caption = 'Cancel'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    TabOrder = 4
  end
  object cmdHelp: TButton
    Left = 55
    Top = 185
    Width = 54
    Height = 21
    Caption = '&Help'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    Visible = False
    OnClick = cmdHelpClick
  end
  object PageControl1: TPageControl
    Left = 6
    Top = 5
    Width = 347
    Height = 172
    ActivePage = pageName
    TabOrder = 0
    object pageCommand: TTabSheet
      Caption = 'pageCommand'
      TabVisible = False
      object Label1: TLabel
        Left = 24
        Top = 16
        Width = 275
        Height = 26
        Caption =
          'Type the location and name of the item you want to create a shor' +
          'tcut to. Or, search for the item by clicking Browse.'
        WordWrap = True
      end
      object Label2: TLabel
        Left = 24
        Top = 56
        Width = 69
        Height = 13
        Caption = '&Command line:'
        FocusControl = txtCommandLine
      end
      object txtCommandLine: TEdit
        Left = 24
        Top = 75
        Width = 264
        Height = 21
        TabOrder = 0
      end
      object btnBrowse: TButton
        Left = 24
        Top = 108
        Width = 82
        Height = 25
        Caption = '&Browse...'
        TabOrder = 1
        OnClick = btnBrowseClick
      end
    end
    object pageName: TTabSheet
      Caption = 'pageName'
      TabVisible = False
      object Label3: TLabel
        Left = 33
        Top = 17
        Width = 145
        Height = 13
        Caption = '&Select a name for the shortcut:'
        FocusControl = txtShortcutName
      end
      object txtShortcutName: TEdit
        Left = 34
        Top = 40
        Width = 223
        Height = 21
        TabOrder = 0
      end
    end
  end
  object OpenDialog1: TOpenDialog
    FileEditStyle = fsEdit
    Filter = 'Programs|*.exe;*.com;*.bat;|All Files|*.*'
    Options = [ofPathMustExist, ofFileMustExist]
    Left = 5
    Top = 182
  end
end